Imports KanBan.Pgd.Common

Public Enum RatingLevel
    Low = 0
    Regular = 1
    Medium = 2
    Good = 3
    VeryGood = 4
End Enum

Public Class RatingLevelExtension

    Public Shared Function GetValues() As IList(Of Pair(Of Integer, String))

        Dim returnList As New List(Of Pair(Of Integer, String))()

        returnList.Add(New Pair(Of Integer, String)(0, "Low"))
        returnList.Add(New Pair(Of Integer, String)(1, "Regular"))
        returnList.Add(New Pair(Of Integer, String)(2, "Medium"))
        returnList.Add(New Pair(Of Integer, String)(3, "Good"))
        returnList.Add(New Pair(Of Integer, String)(4, "Very Good"))

        Return returnList

    End Function

End Class
